1 REM CBM USERS OF NORMAN DISK LIBRARY 2 REM WRITTEN BY DAVID TINGLER 3 POKE53280,0:POKE53281,0:POKE646,1:PRINTCHR$(14):PRINTCHR$(147) 4 PRINTTAB(7)"[195]OMMODORE [213]SERS OF [206]ORMAN" 5 PRINTTAB(5);"C/O [193]. [196]AVID [211]AUSE, [212]REASURER" 6 PRINT" 2111 [202]AZZMAN [196]RIVE,[206]ORMAN, [207][203] 73071" 7 PRINT"[159][208]RESIDENT: [158][212]ED [196]ANILEWICZ.....321-1078" 8 PRINT"[159][211]ECRETARY: [158][202]OYCE [194]ELLER.......794-2071" 9 PRINT"[159][206]EWSLETTER: [158][211]AM [194]ARRETT........321-2601" 10 PRINT"[159]REPORTER: [158][196]AVID [211]WAIM........364-6612" 11 PRINT"[159][204]IBRARIAN: [158][195]LAY [204]EHMANN.......329-8292" 12 PRINT"[159][212]RUSTEES: [158][200]ERB [200]ICKMAN.......321-0692" 13 PRINT" [158][195]ALVERT [196]UKES......799-4350" 14 PRINT 15 PRINT"[159][194][194][211]: [158][207][195][201][197]...............366-7345" 16 PRINT"[159][212]REASURER: [158][196]AVE [211]AUSE.........364-9742" 17 GOSUB44 18 PRINTCHR$(147):PRINT"[159] [208]UBLIC DOMAIN SOFTWARE IS AVAILABLE" 19 PRINT" TO ALL CLUB MEMBERS, BUT WE NEED YOUR " 20 PRINT" PROGRAMS SO WE CAN BUILD THE BEST" 21 PRINT" THE BEST CLUB LIBRARY AROUND!" 22 PRINT"LIBRARY IS BELIEVED TO BE IN THE PUBLIC" 23 PRINT" DOMAIN. [208]LEASE CONTACT THE LIBRARIAN" 24 PRINT" IF YOU HAVE ANY INFORMATION TO THE" 25 PRINT" CONTRARY." 26 PRINTTAB(3)"[159][195]OMMODORE IS A REGISTERED TRADEMARK" 27 PRINT" OF [195]OMMODORE [194]USINESS [205]ACHINES, [201]NC." 28 GOSUB44 29 PRINTCHR$(147) 30 PRINT"[159][208][210][197][211][211]: 31 [153][163]3)"<(null)>SYS TO READ AGAIN." 32 [153][163]3)"OPENSYS TO READ THE DISK DOCUMENTATION." 33 [153][163]3)"OPENSYS TO EXIT PROGRAM." 34 [153][163]3)"OPEN<(null)>SYS TO LOAD NUDOSF WEDGE." 35 [161]C$:[139]C$[178]"R"[167]1 36 [145][171](C$[178]"D")[171]2[172](C$[178]"E")[171]3[172](C$[178]"W")[137]39,47,38 37 [137]35 38 [147]"W",8:[162] 39 [151]53281,11:[151] 53280,11:[159]2,8,2,"MAY DOC":[153][199](147);:C[178]0 40 [132]2,P$:[139]P$[178]"VAL(null)ASC"[167][137]43 41 [151]646,1:[153]P$:C[178]C[170]1:[139]C[178]23[167][141]44:[153][199](147); 42 [137]40 43 [160]2:[141]44:[137]29 44 C[178]0:[153]" OPEN(PRESS TO CONTINUE)" 45 [161]A$:[139]A$[179][177][199](32)[167]45 46 [142] 47 [128]